home *** CD-ROM | disk | FTP | other *** search
/ Club KidSoft Volume 3 #2 / CKSPCV32.BIN / movies / clubroom.dir / 00005_Script_Start Init < prev    next >
Text File  |  1995-04-03  |  615b  |  19 lines

  1. on exitFrame
  2.   global gSMailBox, gMailBoxTimer, gMailBoxUp, gMailBoxCast, gSMailBoxButton
  3.   
  4.   if gMailBoxUp = false then
  5.     if the visible of sprite gSMailBox = true then
  6.       set gMailBoxCast = gMailBoxCast - 1
  7.       if gMailBoxCast >= the number of cast "MAILBOX1.PIC" then 
  8.         set the castNum of sprite gSMailBox to gMailBoxCast
  9.         go to the frame
  10.       end if
  11.       NextPostCard
  12.       set the visible of sprite gSMailBox to false
  13.       set the puppet of sprite gSMailBox to false
  14.       set the visible of sprite gSMailBoxButton to false
  15.       startTimer
  16.     end if
  17.   end if
  18.   
  19. end